cr		equ	0dh	;��� ASCII �������� �������
lf		equ	0ah	;��� ASCII �������� ������
	segment data
;	������ ���������
	global Msg2
Msg2 		db	0ah, 0dh, 'Pojaluista, naberite komandu.', 0ah, 0dh, '$'
	global Msg1
Msg1		db	'Dlina imeni faila bolshe 81', '$'
	global Msg3
Msg3		db	cr, lf, 'Redaktiruemii fail otsutsuvuet!', cr, lf, '$'
	global Msg4
Msg4		db	cr, lf, 'Dlina faila, v sektorah po 256 bayt, ravna ', '$'
	global Msg5
Msg5		db	cr, lf, 'Oshibka chteniy faila', '$'
	global Msg6
Msg6		db	cr, lf, 'Oshibka zapisi faila', '$' 
	global Lname0
Lname0		db	81			;������������ ����� ����� �����
	global Lname
Lname		db	0			;����������� ����� ����� �����
	global Namefile
Namefile	times	81	db	0	;����� ����������� ��� �����
	global Lognum
Lognum		dw	0			;���������� ����� �����
	global Lf
Lf		dw	0			;����� ��������� ����� � �������� �� 256 ����
	global Pf
Pf		db	0			;������� �������������� = 1 - ���� �� �����, 0 - ��.
	global Segin
Segin		dw	0			;����� ��� ����������� ������-�������� ������ ���������
	global B
B db 0h
	global Nt
Nt db 0h
	global Address
Address 	dw	0h
	global Sector
Sector times 16 db 0h 
	times 16 db 0h
	times 16 db 0h
	times 16 db 0h
	times 16 db 0h
	times 16 db 0h
	times 16 db 0h
	times 16 db 0h
	times 16 db 0h
	times 16 db 0h
	times 16 db 0h
	times 16 db 0h
	times 16 db 0h
	times 16 db 0h
	times 16 db 0h
	times 16 db 0h
	global Zagolovok_Vvoda_Sectora
Zagolovok_Vvoda_Sectora db 'Vvedite nomer: $'
	global Spravochnay_stroka
Spravochnay_stroka db 'F1-nachalo|F2-zapis|F3-sled.|F4-redakt.|F5-predid.|F6-proizv.|F10-zaver.', 0ah, 0dh, 0ah, 0dh, 0ah, 0dh, 0ah, 0dh, '$'